home *** CD-ROM | disk | FTP | other *** search
- on startMovie
- global gTextField, gOnIBM
- puppetSprite(11, 1)
- identifyPlatform()
- end
-
- on showtext
- global gTextField, gOnIBM
- if gOnIBM then
- set the textFont of field "article" to "Arial"
- set the textSize of field "article" to 12
- else
- set the textFont of field "article" to "Geneva"
- set the textSize of field "article" to 12
- end if
- put field gTextField into field "article"
- end
-